(end-of-visible-line): After skipping some invisible chars.

don't go forward a character, just to end of line.

diff --git a/lisp/simple.el b/lisp/simple.el
index f57abdb9effe9655a9ed530aad163e2a0462b0f8..a33f0111d8fd50b43b9093744bbecf866f6d6b36 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1279,7 +1279,6 @@ If ARG is zero, move to the beginning of the current line."
     (if (get-text-property (point) 'invisible)
        (goto-char (next-single-property-change (point) 'invisible))
       (goto-char (next-overlay-change (point))))
-    (forward-char 1)
     (end-of-line)))
 \f
 ;;;; Window system cut and paste hooks.